<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in.0</name>
<id>-1</id>
<cardCount>3</cardCount>
<cardID>2938</cardID>
<listID>2559</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>288</width>
<height>240</height>
</cardSize>
<script>on openstackwaitcursorreset menubarset the userlevel to 6delete menu "font"delete menu "style"delete menu "objects"delete menu "tools"delete menu "go"put "Quit MacMail Remote" into menu "file"set the commandchar of menuitem 1 of menu "file" to "Q"set the menumessage of menuitem 1 of menu "file" to "quitit"repeat 9delete menuitem 7 of menu "edit"end repeatend openstackon quititdomenu "Quit HyperCard"end quititon waitcursorset the cursor to watchend waitcursorfunction serverreturn cd fld "server" of cd "MMSI.options"end serverfunction serverpassreturn cd fld "serverpass" of cd "MMSI.options"end serverpasson updatelistput "Loading..." into cd fld "userlist" of cd "MMSI-main"waitcursorrequest "userlist()" of program server()if the result is not empty then answer the resultput it into cd fld "userlist" of cd "MMSI-main"end updatelist</script>